home *** CD-ROM | disk | FTP | other *** search
/ Chip 2004 November / CMCD1104.ISO / Software / Shareware / Utilitare / picozip / PicoZipSetup.exe / {app} / PicoZip.exe / 0 / RCDATA / TFMBATCH / TFMBATCH.txt
Text File  |  2004-09-09  |  31KB  |  1,252 lines

  1. object fmBatch: TfmBatch
  2.   Left = 322
  3.   Top = 253
  4.   Width = 546
  5.   Height = 389
  6.   BorderIcons = [biSystemMenu]
  7.   Caption = 'Batch Tool'
  8.   Color = clBtnFace
  9.   Constraints.MinHeight = 389
  10.   Constraints.MinWidth = 546
  11.   Font.Charset = DEFAULT_CHARSET
  12.   Font.Color = clWindowText
  13.   Font.Height = -11
  14.   Font.Name = 'MS Sans Serif'
  15.   Font.Style = []
  16.   OldCreateOrder = False
  17.   Position = poScreenCenter
  18.   OnCreate = FormCreate
  19.   OnDestroy = FormDestroy
  20.   PixelsPerInch = 96
  21.   TextHeight = 13
  22.   object paBottom: TPanel
  23.     Left = 0
  24.     Top = 317
  25.     Width = 538
  26.     Height = 43
  27.     Align = alBottom
  28.     BevelOuter = bvNone
  29.     TabOrder = 1
  30.     DesignSize = (
  31.       538
  32.       43)
  33.     object bvBottom: TBevel
  34.       Left = 0
  35.       Top = 0
  36.       Width = 538
  37.       Height = 3
  38.       Align = alTop
  39.       Shape = bsTopLine
  40.     end
  41.     object buNext: TButton
  42.       Left = 295
  43.       Top = 10
  44.       Width = 75
  45.       Height = 25
  46.       Anchors = [akRight, akBottom]
  47.       Caption = '&Next >'
  48.       Default = True
  49.       TabOrder = 0
  50.       OnClick = buNextClick
  51.     end
  52.     object buCancel: TButton
  53.       Left = 375
  54.       Top = 10
  55.       Width = 75
  56.       Height = 25
  57.       Anchors = [akRight, akBottom]
  58.       Caption = '&Cancel'
  59.       TabOrder = 1
  60.       OnClick = buCancelClick
  61.     end
  62.     object buHelp: TButton
  63.       Left = 455
  64.       Top = 10
  65.       Width = 75
  66.       Height = 25
  67.       Anchors = [akRight, akBottom]
  68.       Caption = '&Help'
  69.       TabOrder = 2
  70.       OnClick = buHelpClick
  71.     end
  72.   end
  73.   object nbMain: TNotebook
  74.     Left = 0
  75.     Top = 0
  76.     Width = 538
  77.     Height = 317
  78.     Align = alClient
  79.     TabOrder = 0
  80.     object TPage
  81.       Left = 0
  82.       Top = 0
  83.       Caption = 'SelectFiles'
  84.       DesignSize = (
  85.         538
  86.         317)
  87.       object laSelectedFiles: TLabel
  88.         Left = 8
  89.         Top = 40
  90.         Width = 521
  91.         Height = 41
  92.         Anchors = [akLeft, akTop, akRight]
  93.         AutoSize = False
  94.         Caption = 
  95.           'Please select files to process by clicking on the "Add" button. ' +
  96.           'You can remove any item from the list by selecting them, then cl' +
  97.           'ick the "Remove" button. After adding all the files you want to ' +
  98.           'process, click the "Next" button to proceed.'
  99.         WordWrap = True
  100.       end
  101.       object laTitle0: TLabel
  102.         Left = 8
  103.         Top = 8
  104.         Width = 114
  105.         Height = 13
  106.         Caption = 'Select Archive Files'
  107.         Font.Charset = DEFAULT_CHARSET
  108.         Font.Color = clWindowText
  109.         Font.Height = -11
  110.         Font.Name = 'MS Sans Serif'
  111.         Font.Style = [fsBold]
  112.         ParentFont = False
  113.       end
  114.       object bvTitle0: TBevel
  115.         Left = 8
  116.         Top = 27
  117.         Width = 526
  118.         Height = 9
  119.         Anchors = [akLeft, akTop, akRight]
  120.         Shape = bsTopLine
  121.       end
  122.       object lbSelectedFiles: TListBox
  123.         Left = 8
  124.         Top = 88
  125.         Width = 437
  126.         Height = 222
  127.         Anchors = [akLeft, akTop, akRight, akBottom]
  128.         ItemHeight = 13
  129.         MultiSelect = True
  130.         PopupMenu = pmSelect
  131.         TabOrder = 0
  132.       end
  133.       object buAddFile: TButton
  134.         Left = 452
  135.         Top = 88
  136.         Width = 75
  137.         Height = 25
  138.         Anchors = [akTop, akRight]
  139.         Caption = '&Add'
  140.         TabOrder = 1
  141.         OnClick = buAddFileClick
  142.       end
  143.       object buRemoveFile: TButton
  144.         Left = 452
  145.         Top = 120
  146.         Width = 75
  147.         Height = 25
  148.         Anchors = [akTop, akRight]
  149.         Caption = '&Remove'
  150.         TabOrder = 2
  151.         OnClick = buRemoveFileClick
  152.       end
  153.     end
  154.     object TPage
  155.       Left = 0
  156.       Top = 0
  157.       Caption = 'Progress'
  158.       DesignSize = (
  159.         538
  160.         317)
  161.       object laProgressFilename: TLabel
  162.         Left = 8
  163.         Top = 40
  164.         Width = 99
  165.         Height = 13
  166.         Caption = 'Currently Processing:'
  167.       end
  168.       object laCurrentFile: TLabel
  169.         Left = 8
  170.         Top = 56
  171.         Width = 521
  172.         Height = 13
  173.         Anchors = [akLeft, akTop, akRight]
  174.         AutoSize = False
  175.       end
  176.       object laProgressTotal: TLabel
  177.         Left = 8
  178.         Top = 120
  179.         Width = 53
  180.         Height = 13
  181.         Caption = 'Total Time:'
  182.       end
  183.       object laProgressCurrent: TLabel
  184.         Left = 8
  185.         Top = 80
  186.         Width = 56
  187.         Height = 13
  188.         Caption = 'Current File:'
  189.       end
  190.       object laFilesProcessed: TLabel
  191.         Left = 8
  192.         Top = 168
  193.         Width = 77
  194.         Height = 13
  195.         Caption = 'Files Processed:'
  196.       end
  197.       object laTotalPercent: TLabel
  198.         Left = 472
  199.         Top = 120
  200.         Width = 56
  201.         Height = 13
  202.         Alignment = taRightJustify
  203.         Anchors = [akTop, akRight]
  204.         AutoSize = False
  205.         Caption = '0%'
  206.       end
  207.       object laCurrentPercent: TLabel
  208.         Left = 472
  209.         Top = 80
  210.         Width = 57
  211.         Height = 13
  212.         Alignment = taRightJustify
  213.         Anchors = [akTop, akRight]
  214.         AutoSize = False
  215.         Caption = '0%'
  216.       end
  217.       object laTitle1: TLabel
  218.         Left = 8
  219.         Top = 8
  220.         Width = 50
  221.         Height = 13
  222.         Caption = 'Progress'
  223.         Font.Charset = DEFAULT_CHARSET
  224.         Font.Color = clWindowText
  225.         Font.Height = -11
  226.         Font.Name = 'MS Sans Serif'
  227.         Font.Style = [fsBold]
  228.         ParentFont = False
  229.       end
  230.       object bvTitle1: TBevel
  231.         Left = 8
  232.         Top = 27
  233.         Width = 524
  234.         Height = 9
  235.         Anchors = [akLeft, akTop, akRight]
  236.         Shape = bsTopLine
  237.       end
  238.       object pbCurrent: TProgressBar
  239.         Left = 8
  240.         Top = 96
  241.         Width = 521
  242.         Height = 17
  243.         Anchors = [akLeft, akTop, akRight]
  244.         TabOrder = 0
  245.       end
  246.       object pbTotal: TProgressBar
  247.         Left = 8
  248.         Top = 136
  249.         Width = 521
  250.         Height = 17
  251.         Anchors = [akLeft, akTop, akRight]
  252.         TabOrder = 1
  253.       end
  254.       object lbProgressCompleted: TListBox
  255.         Left = 8
  256.         Top = 184
  257.         Width = 521
  258.         Height = 119
  259.         Anchors = [akLeft, akTop, akRight, akBottom]
  260.         ItemHeight = 13
  261.         TabOrder = 2
  262.       end
  263.     end
  264.     object TPage
  265.       Left = 0
  266.       Top = 0
  267.       Caption = 'Result'
  268.       DesignSize = (
  269.         538
  270.         317)
  271.       object laResults: TLabel
  272.         Left = 8
  273.         Top = 40
  274.         Width = 66
  275.         Height = 13
  276.         Caption = 'Batch Results'
  277.       end
  278.       object laTitle2: TLabel
  279.         Left = 8
  280.         Top = 8
  281.         Width = 80
  282.         Height = 13
  283.         Caption = 'Batch Results'
  284.         Font.Charset = DEFAULT_CHARSET
  285.         Font.Color = clWindowText
  286.         Font.Height = -11
  287.         Font.Name = 'MS Sans Serif'
  288.         Font.Style = [fsBold]
  289.         ParentFont = False
  290.       end
  291.       object bvTitle2: TBevel
  292.         Left = 8
  293.         Top = 27
  294.         Width = 521
  295.         Height = 9
  296.         Anchors = [akLeft, akTop, akRight]
  297.         Shape = bsTopLine
  298.       end
  299.       object buCopyResults: TButton
  300.         Left = 432
  301.         Top = 56
  302.         Width = 99
  303.         Height = 25
  304.         Anchors = [akTop, akRight]
  305.         Caption = 'Copy to Clipboard'
  306.         TabOrder = 1
  307.         OnClick = buCopyResultsClick
  308.       end
  309.       object buSaveResults: TButton
  310.         Left = 432
  311.         Top = 88
  312.         Width = 99
  313.         Height = 25
  314.         Anchors = [akTop, akRight]
  315.         Caption = 'Save to File'
  316.         TabOrder = 2
  317.         OnClick = buSaveResultsClick
  318.       end
  319.       object meResults: TMemo
  320.         Left = 8
  321.         Top = 56
  322.         Width = 417
  323.         Height = 251
  324.         Anchors = [akLeft, akTop, akRight, akBottom]
  325.         ReadOnly = True
  326.         ScrollBars = ssBoth
  327.         TabOrder = 0
  328.         WordWrap = False
  329.       end
  330.     end
  331.     object TPage
  332.       Left = 0
  333.       Top = 0
  334.       Caption = 'SelectOutputDir'
  335.       DesignSize = (
  336.         538
  337.         317)
  338.       object laOutputFolder: TLabel
  339.         Left = 8
  340.         Top = 40
  341.         Width = 521
  342.         Height = 13
  343.         AutoSize = False
  344.         Caption = 'Please select the output folder:'
  345.       end
  346.       object laTitle4: TLabel
  347.         Left = 8
  348.         Top = 8
  349.         Width = 118
  350.         Height = 13
  351.         Caption = 'Select Output Folder'
  352.         Font.Charset = DEFAULT_CHARSET
  353.         Font.Color = clWindowText
  354.         Font.Height = -11
  355.         Font.Name = 'MS Sans Serif'
  356.         Font.Style = [fsBold]
  357.         ParentFont = False
  358.       end
  359.       object bvTitle4: TBevel
  360.         Left = 8
  361.         Top = 27
  362.         Width = 524
  363.         Height = 9
  364.         Anchors = [akLeft, akTop, akRight]
  365.         Shape = bsTopLine
  366.       end
  367.       object rbOutputSame: TRadioButton
  368.         Left = 16
  369.         Top = 64
  370.         Width = 321
  371.         Height = 17
  372.         Caption = 'Use the same folder as the original file'
  373.         Checked = True
  374.         TabOrder = 0
  375.         TabStop = True
  376.         OnClick = rbOutputFolderClick
  377.       end
  378.       object rbOutputFolder: TRadioButton
  379.         Left = 16
  380.         Top = 90
  381.         Width = 57
  382.         Height = 17
  383.         Caption = 'Folder:'
  384.         TabOrder = 1
  385.         OnClick = rbOutputFolderClick
  386.       end
  387.       object rxdeOutputFolder: TJvDirectoryEdit
  388.         Left = 72
  389.         Top = 86
  390.         Width = 377
  391.         Height = 21
  392.         DialogKind = dkWin32
  393.         DialogText = 'Select Output Folder'
  394.         DialogOptions = [sdAllowCreate, sdPerformCreate]
  395.         ButtonFlat = False
  396.         Enabled = False
  397.         NumGlyphs = 1
  398.         TabOrder = 2
  399.       end
  400.       object ckExtractToSubfolder: TCheckBox
  401.         Left = 17
  402.         Top = 128
  403.         Width = 360
  404.         Height = 17
  405.         Caption = 
  406.           'Extract each archive to a separate subfolder in the output folde' +
  407.           'r above'
  408.         TabOrder = 3
  409.         Visible = False
  410.       end
  411.       object ckRestoreFolders: TCheckBox
  412.         Left = 17
  413.         Top = 146
  414.         Width = 136
  415.         Height = 17
  416.         Caption = 'Restore original folders'
  417.         TabOrder = 4
  418.         Visible = False
  419.       end
  420.       object ckConfirmOverwrites: TCheckBox
  421.         Left = 17
  422.         Top = 164
  423.         Width = 128
  424.         Height = 17
  425.         Caption = 'Confirm file overwrites'
  426.         TabOrder = 5
  427.         Visible = False
  428.       end
  429.     end
  430.     object TPage
  431.       Left = 0
  432.       Top = 0
  433.       Caption = 'SelectArcFmt'
  434.       DesignSize = (
  435.         538
  436.         317)
  437.       object laOutputFmt: TLabel
  438.         Left = 8
  439.         Top = 40
  440.         Width = 247
  441.         Height = 13
  442.         Caption = 'Please select the format for the archive files created:'
  443.       end
  444.       object laTitle5: TLabel
  445.         Left = 8
  446.         Top = 8
  447.         Width = 107
  448.         Height = 13
  449.         Caption = 'Batch Add Options'
  450.         Font.Charset = DEFAULT_CHARSET
  451.         Font.Color = clWindowText
  452.         Font.Height = -11
  453.         Font.Name = 'MS Sans Serif'
  454.         Font.Style = [fsBold]
  455.         ParentFont = False
  456.       end
  457.       object bvTitle5: TBevel
  458.         Left = 8
  459.         Top = 27
  460.         Width = 524
  461.         Height = 9
  462.         Anchors = [akLeft, akTop, akRight]
  463.         Shape = bsTopLine
  464.       end
  465.       object rbBh: TRadioButton
  466.         Left = 16
  467.         Top = 64
  468.         Width = 200
  469.         Height = 17
  470.         Caption = '.bh (BlakHole)'
  471.         TabOrder = 0
  472.       end
  473.       object rbCab: TRadioButton
  474.         Tag = 1
  475.         Left = 16
  476.         Top = 80
  477.         Width = 200
  478.         Height = 17
  479.         Caption = '.cab (Microsoft Cabinet)'
  480.         TabOrder = 1
  481.       end
  482.       object rbGz: TRadioButton
  483.         Tag = 5
  484.         Left = 16
  485.         Top = 176
  486.         Width = 200
  487.         Height = 17
  488.         Caption = '.gz (Unix GZip)'
  489.         TabOrder = 2
  490.       end
  491.       object rbJar: TRadioButton
  492.         Tag = 6
  493.         Left = 16
  494.         Top = 96
  495.         Width = 200
  496.         Height = 17
  497.         Caption = '.jar (Javasoft Archive)'
  498.         TabOrder = 3
  499.       end
  500.       object rbLha: TRadioButton
  501.         Tag = 2
  502.         Left = 16
  503.         Top = 112
  504.         Width = 200
  505.         Height = 17
  506.         Caption = '.lha (LHA Archive)'
  507.         TabOrder = 4
  508.       end
  509.       object rbLzh: TRadioButton
  510.         Tag = 2
  511.         Left = 16
  512.         Top = 128
  513.         Width = 200
  514.         Height = 17
  515.         Caption = '.lzh (LZH Archive)'
  516.         TabOrder = 5
  517.       end
  518.       object rbTar: TRadioButton
  519.         Tag = 4
  520.         Left = 16
  521.         Top = 144
  522.         Width = 200
  523.         Height = 17
  524.         Caption = '.tar (Unix Tape Archive)'
  525.         TabOrder = 6
  526.       end
  527.       object rbZip: TRadioButton
  528.         Tag = 3
  529.         Left = 16
  530.         Top = 160
  531.         Width = 200
  532.         Height = 17
  533.         Caption = '.zip (Zip Archive)'
  534.         Checked = True
  535.         TabOrder = 7
  536.         TabStop = True
  537.       end
  538.       object ckDeleteSource: TCheckBox
  539.         Left = 8
  540.         Top = 200
  541.         Width = 209
  542.         Height = 17
  543.         Caption = 'Delete original file after creating archive'
  544.         TabOrder = 8
  545.       end
  546.       object ckAutoOverwrite: TCheckBox
  547.         Left = 8
  548.         Top = 216
  549.         Width = 185
  550.         Height = 17
  551.         Caption = 'Overwrite files without prompting'
  552.         TabOrder = 9
  553.       end
  554.     end
  555.     object TPage
  556.       Left = 0
  557.       Top = 0
  558.       Caption = 'AddOptions'
  559.       DesignSize = (
  560.         538
  561.         317)
  562.       object laFilesToAdd: TLabel
  563.         Left = 8
  564.         Top = 40
  565.         Width = 258
  566.         Height = 13
  567.         Caption = 'Select files to add to your previously selected archives:'
  568.       end
  569.       object laTitle6: TLabel
  570.         Left = 8
  571.         Top = 8
  572.         Width = 108
  573.         Height = 13
  574.         Caption = 'Select Files to Add'
  575.         Font.Charset = DEFAULT_CHARSET
  576.         Font.Color = clWindowText
  577.         Font.Height = -11
  578.         Font.Name = 'MS Sans Serif'
  579.         Font.Style = [fsBold]
  580.         ParentFont = False
  581.       end
  582.       object bvTitle6: TBevel
  583.         Left = 8
  584.         Top = 27
  585.         Width = 523
  586.         Height = 9
  587.         Anchors = [akLeft, akTop, akRight]
  588.         Shape = bsTopLine
  589.       end
  590.       object lbAddFiles: TListBox
  591.         Left = 8
  592.         Top = 56
  593.         Width = 441
  594.         Height = 183
  595.         Anchors = [akLeft, akTop, akRight, akBottom]
  596.         ItemHeight = 13
  597.         MultiSelect = True
  598.         PopupMenu = pmSelect
  599.         TabOrder = 0
  600.       end
  601.       object buAddMore: TButton
  602.         Left = 456
  603.         Top = 56
  604.         Width = 75
  605.         Height = 25
  606.         Anchors = [akTop, akRight]
  607.         Caption = '&Add'
  608.         TabOrder = 1
  609.         OnClick = buAddMoreClick
  610.       end
  611.       object buRemoveMore: TButton
  612.         Left = 456
  613.         Top = 88
  614.         Width = 75
  615.         Height = 25
  616.         Anchors = [akTop, akRight]
  617.         Caption = '&Remove'
  618.         TabOrder = 2
  619.         OnClick = buRemoveMoreClick
  620.       end
  621.       object gbAddOptions: TGroupBox
  622.         Left = 8
  623.         Top = 243
  624.         Width = 441
  625.         Height = 65
  626.         Anchors = [akLeft, akRight, akBottom]
  627.         Caption = 'Add Options'
  628.         TabOrder = 3
  629.         object laAddCompression: TLabel
  630.           Left = 16
  631.           Top = 20
  632.           Width = 66
  633.           Height = 13
  634.           Caption = 'Compression: '
  635.         end
  636.         object cbAddCompression: TComboBox
  637.           Left = 16
  638.           Top = 36
  639.           Width = 145
  640.           Height = 21
  641.           Style = csDropDownList
  642.           ItemHeight = 13
  643.           ItemIndex = 0
  644.           TabOrder = 0
  645.           Text = 'Maximum'
  646.           Items.Strings = (
  647.             'Maximum'
  648.             'Normal'
  649.             'Light'
  650.             'Minimum'
  651.             'None')
  652.         end
  653.         object ckAddSaveFullPath: TCheckBox
  654.           Left = 232
  655.           Top = 40
  656.           Width = 129
  657.           Height = 17
  658.           Caption = 'Save full path info'
  659.           TabOrder = 1
  660.         end
  661.         object ckAddAutoOverwrite: TCheckBox
  662.           Left = 232
  663.           Top = 16
  664.           Width = 185
  665.           Height = 17
  666.           Caption = 'Overwrite files without prompting'
  667.           TabOrder = 2
  668.         end
  669.       end
  670.     end
  671.     object TPage
  672.       Left = 0
  673.       Top = 0
  674.       Caption = 'DeleteSpec'
  675.       DesignSize = (
  676.         538
  677.         317)
  678.       object laTitle7: TLabel
  679.         Left = 8
  680.         Top = 8
  681.         Width = 208
  682.         Height = 13
  683.         Caption = 'Enter File Names or Masks to Delete'
  684.         Font.Charset = DEFAULT_CHARSET
  685.         Font.Color = clWindowText
  686.         Font.Height = -11
  687.         Font.Name = 'MS Sans Serif'
  688.         Font.Style = [fsBold]
  689.         ParentFont = False
  690.       end
  691.       object bvTitle7: TBevel
  692.         Left = 8
  693.         Top = 27
  694.         Width = 523
  695.         Height = 9
  696.         Anchors = [akLeft, akTop, akRight]
  697.         Shape = bsTopLine
  698.       end
  699.       object laDeleteSpecList: TLabel
  700.         Left = 8
  701.         Top = 40
  702.         Width = 324
  703.         Height = 13
  704.         Caption = 
  705.           'File names or masks to delete from your previously selected arch' +
  706.           'ives:'
  707.       end
  708.       object laCurDeleteSpec: TLabel
  709.         Left = 344
  710.         Top = 56
  711.         Width = 75
  712.         Height = 13
  713.         Caption = 'File name/mask'
  714.       end
  715.       object lbDeleteSpec: TListBox
  716.         Left = 8
  717.         Top = 56
  718.         Width = 329
  719.         Height = 249
  720.         Anchors = [akLeft, akTop, akRight, akBottom]
  721.         ItemHeight = 13
  722.         MultiSelect = True
  723.         TabOrder = 0
  724.       end
  725.       object buAddDeleteSpec: TButton
  726.         Left = 344
  727.         Top = 100
  728.         Width = 89
  729.         Height = 25
  730.         Anchors = [akTop, akRight]
  731.         Caption = '&Add'
  732.         TabOrder = 2
  733.         OnClick = buAddDeleteSpecClick
  734.       end
  735.       object buRemoveDeleteSpec: TButton
  736.         Left = 440
  737.         Top = 100
  738.         Width = 89
  739.         Height = 25
  740.         Anchors = [akTop, akRight]
  741.         Caption = '&Remove'
  742.         TabOrder = 3
  743.         OnClick = buRemoveDeleteSpecClick
  744.       end
  745.       object edDeleteSpec: TEdit
  746.         Left = 344
  747.         Top = 72
  748.         Width = 185
  749.         Height = 21
  750.         TabOrder = 1
  751.       end
  752.     end
  753.   end
  754.   object ztvBlakHole: TBlakHole
  755.     OnError = ztvZipError
  756.     Attributes = [fsZeroAttr, fsReadOnly, fsArchive, fsCompressed, fsEncrypted]
  757.     DeleteOptions = doAllowUndo
  758.     RecurseDirs = False
  759.     ArcType = atBh
  760.     AttributesEx = []
  761.     CompressMethod = cmDeflate
  762.     DefaultExt = '.bh'
  763.     StoreFilesOfType.Strings = (
  764.       '.ACE'
  765.       '.ARC'
  766.       '.ARJ'
  767.       '.BH'
  768.       '.CAB'
  769.       '.ENC'
  770.       '.GZ'
  771.       '.HA'
  772.       '.JAR'
  773.       '.LHA'
  774.       '.LZH'
  775.       '.PAK'
  776.       '.PK3'
  777.       '.PK_'
  778.       '.RAR'
  779.       '.TAR'
  780.       '.TGZ'
  781.       '.UUE'
  782.       '.UU'
  783.       '.WAR'
  784.       '.XXE'
  785.       '.Z'
  786.       '.ZIP'
  787.       '.ZOO')
  788.     Switch = swAdd
  789.     TempDir = 'C:\DOCUME~1\Chris\LOCALS~1\Temp\'
  790.     OnNonWriteableArchive = ztvZipNonWriteableArchive
  791.     OnProgress = ztvUnZipProgress
  792.     OnGetPassword = ztvUnZipGetPassword
  793.     OnRenameDupeFile = ztvZipRenameDupeFile
  794.     OnReplaceFile = ztvZipReplaceFile
  795.     Left = 8
  796.     Top = 296
  797.   end
  798.   object ztvGZip: TGZip
  799.     OnError = ztvZipError
  800.     Attributes = [fsZeroAttr, fsReadOnly, fsArchive, fsCompressed, fsEncrypted]
  801.     DeleteOptions = doAllowUndo
  802.     ArcType = atGZip
  803.     AttributesEx = []
  804.     DefaultExt = '.gz'
  805.     CompressMethod = cmDeflate
  806.     ConfirmOverwrites = True
  807.     Switch = swAdd
  808.     OnNonWriteableArchive = ztvZipNonWriteableArchive
  809.     OnProgress = ztvUnZipProgress
  810.     OnFileExists = ztvGZipFileExists
  811.     Left = 36
  812.     Top = 296
  813.   end
  814.   object ztvLha: TLha
  815.     OnError = ztvZipError
  816.     Attributes = [fsZeroAttr, fsReadOnly, fsArchive, fsCompressed, fsEncrypted]
  817.     DeleteOptions = doAllowUndo
  818.     RecurseDirs = False
  819.     ArcType = atLha
  820.     CompressMethod = cmFrozen6
  821.     DefaultExt = '.lha'
  822.     StoreFilesOfType.Strings = (
  823.       '.ACE'
  824.       '.ARC'
  825.       '.ARJ'
  826.       '.BH'
  827.       '.CAB'
  828.       '.ENC'
  829.       '.GZ'
  830.       '.HA'
  831.       '.JAR'
  832.       '.LHA'
  833.       '.LZH'
  834.       '.PAK'
  835.       '.PK3'
  836.       '.PK_'
  837.       '.RAR'
  838.       '.TAR'
  839.       '.TGZ'
  840.       '.UUE'
  841.       '.UU'
  842.       '.WAR'
  843.       '.XXE'
  844.       '.Z'
  845.       '.ZIP'
  846.       '.ZOO')
  847.     Switch = swAdd
  848.     TempDir = 'C:\DOCUME~1\Chris\LOCALS~1\Temp\'
  849.     OnNonWriteableArchive = ztvZipNonWriteableArchive
  850.     OnProgress = ztvUnZipProgress
  851.     OnRenameDupeFile = ztvZipRenameDupeFile
  852.     OnReplaceFile = ztvZipReplaceFile
  853.     Left = 64
  854.     Top = 296
  855.   end
  856.   object ztvJar: TJar
  857.     OnError = ztvZipError
  858.     Attributes = [fsZeroAttr, fsReadOnly, fsArchive, fsCompressed, fsEncrypted]
  859.     DeleteOptions = doAllowUndo
  860.     RecurseDirs = False
  861.     ArcType = atJar
  862.     AttributesEx = []
  863.     CompressMethod = cmDeflate
  864.     DefaultExt = '.jar'
  865.     SeedDataKeys.Key0 = 305419896
  866.     SeedDataKeys.Key1 = 591751049
  867.     SeedDataKeys.Key2 = 878082192
  868.     SeedHeaderKeys.Key0 = 269766672
  869.     SeedHeaderKeys.Key1 = 33834504
  870.     SeedHeaderKeys.Key2 = 541352064
  871.     StoreFilesOfType.Strings = (
  872.       '.ACE'
  873.       '.ARC'
  874.       '.ARJ'
  875.       '.BH'
  876.       '.CAB'
  877.       '.ENC'
  878.       '.GZ'
  879.       '.HA'
  880.       '.JAR'
  881.       '.LHA'
  882.       '.LZH'
  883.       '.PAK'
  884.       '.PK3'
  885.       '.PK_'
  886.       '.RAR'
  887.       '.TAR'
  888.       '.TGZ'
  889.       '.UUE'
  890.       '.UU'
  891.       '.WAR'
  892.       '.XXE'
  893.       '.Z'
  894.       '.ZIP'
  895.       '.ZOO')
  896.     TempDir = 'C:\DOCUME~1\Chris\LOCALS~1\Temp\'
  897.     OnDiskWriteProtectErr = ztvZipDiskWriteProtectErr
  898.     OnDiskInDrvErr = ztvZipDiskInDrvErr
  899.     OnGetPassword = ztvUnZipGetPassword
  900.     OnInsertDisk = ztvZipInsertDisk
  901.     OnNonWriteableArchive = ztvZipNonWriteableArchive
  902.     OnProgress = ztvUnZipProgress
  903.     OnRenameDupeFile = ztvZipRenameDupeFile
  904.     OnReplaceFile = ztvZipReplaceFile
  905.     Switch = swAdd
  906.     Left = 92
  907.     Top = 296
  908.   end
  909.   object ztvMakeCab: TMakeCab
  910.     OnError = ztvZipError
  911.     Attributes = [fsZeroAttr, fsReadOnly, fsArchive, fsCompressed, fsEncrypted]
  912.     DeleteOptions = doAllowUndo
  913.     RecurseDirs = False
  914.     ArcType = atCab
  915.     CompressMethod = cmMsZip
  916.     DefaultExt = '.cab'
  917.     OnNonWriteableArchive = ztvZipNonWriteableArchive
  918.     OnProgress = ztvUnZipProgress
  919.     OnReplaceFile = ztvZipReplaceFile
  920.     TempDir = 'C:\DOCUME~1\Chris\LOCALS~1\Temp\'
  921.     Left = 120
  922.     Top = 296
  923.   end
  924.   object ztvTar: TTar
  925.     OnError = ztvZipError
  926.     Attributes = [fsZeroAttr, fsReadOnly, fsArchive, fsCompressed, fsEncrypted]
  927.     DeleteOptions = doAllowUndo
  928.     RecurseDirs = False
  929.     ArcType = atTar
  930.     DefaultExt = '.tar'
  931.     CompressMethod = cmTarred
  932.     Switch = swAdd
  933.     TempDir = 'C:\DOCUME~1\Chris\LOCALS~1\Temp\'
  934.     UnixUName = 'root'
  935.     UnixGName = 'root'
  936.     OnNonWriteableArchive = ztvZipNonWriteableArchive
  937.     OnProgress = ztvUnZipProgress
  938.     OnRenameDupeFile = ztvZipRenameDupeFile
  939.     OnReplaceFile = ztvZipReplaceFile
  940.     Left = 148
  941.     Top = 296
  942.   end
  943.   object ztvZip: TZip
  944.     OnError = ztvZipError
  945.     Attributes = [fsZeroAttr, fsReadOnly, fsArchive, fsCompressed, fsEncrypted]
  946.     DeleteOptions = doAllowUndo
  947.     RecurseDirs = False
  948.     ArcType = atZip
  949.     AttributesEx = []
  950.     CompressMethod = cmDeflate
  951.     DefaultExt = '.zip'
  952.     SeedDataKeys.Key0 = 305419896
  953.     SeedDataKeys.Key1 = 591751049
  954.     SeedDataKeys.Key2 = 878082192
  955.     SeedHeaderKeys.Key0 = 269766672
  956.     SeedHeaderKeys.Key1 = 33834504
  957.     SeedHeaderKeys.Key2 = 541352064
  958.     StoreFilesOfType.Strings = (
  959.       '.ACE'
  960.       '.ARC'
  961.       '.ARJ'
  962.       '.BH'
  963.       '.CAB'
  964.       '.ENC'
  965.       '.GZ'
  966.       '.HA'
  967.       '.JAR'
  968.       '.LHA'
  969.       '.LZH'
  970.       '.PAK'
  971.       '.PK3'
  972.       '.PK_'
  973.       '.RAR'
  974.       '.TAR'
  975.       '.TGZ'
  976.       '.UUE'
  977.       '.UU'
  978.       '.WAR'
  979.       '.XXE'
  980.       '.Z'
  981.       '.ZIP'
  982.       '.ZOO')
  983.     TempDir = 'C:\DOCUME~1\Chris\LOCALS~1\Temp\'
  984.     OnDiskWriteProtectErr = ztvZipDiskWriteProtectErr
  985.     OnDiskInDrvErr = ztvZipDiskInDrvErr
  986.     OnGetPassword = ztvUnZipGetPassword
  987.     OnInsertDisk = ztvZipInsertDisk
  988.     OnNonWriteableArchive = ztvZipNonWriteableArchive
  989.     OnProgress = ztvUnZipProgress
  990.     OnRenameDupeFile = ztvZipRenameDupeFile
  991.     OnReplaceFile = ztvZipReplaceFile
  992.     Switch = swAdd
  993.     Left = 176
  994.     Top = 296
  995.   end
  996.   object ztvUUEncode: TUUEncode
  997.     OnError = ztvZipError
  998.     Attributes = [fsZeroAttr, fsReadOnly, fsArchive, fsCompressed, fsEncrypted]
  999.     DeleteOptions = doAllowUndo
  1000.     CompressMethod = cmUUEncode
  1001.     DefaultExt = '.uue'
  1002.     KBytesPerVolume = 0
  1003.     WriteTableToFile = False
  1004.     OnFileExists = ztvGZipFileExists
  1005.     OnNonWriteableArchive = ztvZipNonWriteableArchive
  1006.     OnProgress = ztvUnZipProgress
  1007.     Left = 204
  1008.     Top = 296
  1009.   end
  1010.   object ztvUnACE: TUnACE
  1011.     OnError = ztvUnZipError
  1012.     CpuType = cptAuto
  1013.     OnProgress = ztvUnZipProgress
  1014.     OnGetPassword = ztvUnZipGetPassword
  1015.     OnFileExists = ztvUnZipFileExists
  1016.     Left = 8
  1017.     Top = 328
  1018.   end
  1019.   object ztvUnArc: TUnArc
  1020.     OnError = ztvUnZipError
  1021.     CpuType = cptAuto
  1022.     OnFileExists = ztvUnZipFileExists
  1023.     OnProgress = ztvUnZipProgress
  1024.     Left = 36
  1025.     Top = 328
  1026.   end
  1027.   object ztvUnArj: TUnARJ
  1028.     OnError = ztvUnZipError
  1029.     CpuType = cptAuto
  1030.     OnFileExists = ztvUnZipFileExists
  1031.     OnGetPassword = ztvUnZipGetPassword
  1032.     OnProgress = ztvUnZipProgress
  1033.     Left = 64
  1034.     Top = 328
  1035.   end
  1036.   object ztvUnBh: TUnBh
  1037.     OnError = ztvUnZipError
  1038.     CpuType = cptAuto
  1039.     SeedDataKeys.Key0 = 305419896
  1040.     SeedDataKeys.Key1 = 591751049
  1041.     SeedDataKeys.Key2 = 878082192
  1042.     OnProgress = ztvUnZipProgress
  1043.     OnFileExists = ztvUnZipFileExists
  1044.     OnGetPassword = ztvUnZipGetPassword
  1045.     Left = 92
  1046.     Top = 328
  1047.   end
  1048.   object ztvUnCab: TUnCab
  1049.     OnError = ztvUnZipError
  1050.     CpuType = cptAuto
  1051.     OnProgress = ztvUnZipProgress
  1052.     OnFileExists = ztvUnZipFileExists
  1053.     Left = 120
  1054.     Top = 328
  1055.   end
  1056.   object ztvUUDecode: TUUDecode
  1057.     OnError = ztvUnZipError
  1058.     CpuType = cptAuto
  1059.     Algorithm = uudecode
  1060.     VolumeStartNum = 0
  1061.     OnProgress = ztvUnZipProgress
  1062.     OnFileExists = ztvUnZipFileExists
  1063.     Left = 148
  1064.     Top = 328
  1065.   end
  1066.   object ztvUnGZip: TUnGZip
  1067.     OnError = ztvUnZipError
  1068.     CpuType = cptAuto
  1069.     GzTarDeleteOptions = doFinal
  1070.     TempDir = 'C:\DOCUME~1\Chris\LOCALS~1\Temp\'
  1071.     OnProgress = ztvUnZipProgress
  1072.     OnFileExists = ztvUnZipFileExists
  1073.     OnNestedTarFile = ztvUnGZipNestedTarFile
  1074.     Left = 176
  1075.     Top = 328
  1076.   end
  1077.   object ztvUnJar: TUnJar
  1078.     OnError = ztvUnZipError
  1079.     CpuType = cptAuto
  1080.     SeedDataKeys.Key0 = 305419896
  1081.     SeedDataKeys.Key1 = 591751049
  1082.     SeedDataKeys.Key2 = 878082192
  1083.     SeedHeaderKeys.Key0 = 269766672
  1084.     SeedHeaderKeys.Key1 = 33834504
  1085.     SeedHeaderKeys.Key2 = 541352064
  1086.     OnGetPassword = ztvUnZipGetPassword
  1087.     OnGetZipFirstDisk = ztvZipTVGetZipFirstDisk
  1088.     OnGetZipNextDisk = ztvZipTVGetZipNextDisk
  1089.     OnGetZipLastDisk = ztvZipTVGetZipLastDisk
  1090.     OnFileExists = ztvUnZipFileExists
  1091.     OnProgress = ztvUnZipProgress
  1092.     OnCorruptZipHeader = ztvZipTVCorruptZipHeader
  1093.     Left = 204
  1094.     Top = 328
  1095.   end
  1096.   object ztvUnLha: TUnLha
  1097.     OnError = ztvUnZipError
  1098.     CpuType = cptAuto
  1099.     OnProgress = ztvUnZipProgress
  1100.     OnFileExists = ztvUnZipFileExists
  1101.     Left = 232
  1102.     Top = 328
  1103.   end
  1104.   object ztvUnRar: TUnRar
  1105.     OnError = ztvUnZipError
  1106.     CpuType = cptAuto
  1107.     OnFileExists = ztvUnZipFileExists
  1108.     OnGetPassword = ztvUnZipGetPassword
  1109.     OnProgress = ztvUnZipProgress
  1110.     Left = 260
  1111.     Top = 328
  1112.   end
  1113.   object ztvUnTar: TUnTar
  1114.     OnError = ztvUnZipError
  1115.     CpuType = cptAuto
  1116.     OnProgress = ztvUnZipProgress
  1117.     OnFileExists = ztvUnZipFileExists
  1118.     Left = 288
  1119.     Top = 328
  1120.   end
  1121.   object ztvUnZip: TUnZip
  1122.     OnError = ztvUnZipError
  1123.     CpuType = cptAuto
  1124.     SeedDataKeys.Key0 = 305419896
  1125.     SeedDataKeys.Key1 = 591751049
  1126.     SeedDataKeys.Key2 = 878082192
  1127.     SeedHeaderKeys.Key0 = 269766672
  1128.     SeedHeaderKeys.Key1 = 33834504
  1129.     SeedHeaderKeys.Key2 = 541352064
  1130.     OnGetPassword = ztvUnZipGetPassword
  1131.     OnGetZipFirstDisk = ztvZipTVGetZipFirstDisk
  1132.     OnGetZipNextDisk = ztvZipTVGetZipNextDisk
  1133.     OnGetZipLastDisk = ztvZipTVGetZipLastDisk
  1134.     OnFileExists = ztvUnZipFileExists
  1135.     OnProgress = ztvUnZipProgress
  1136.     OnCorruptZipHeader = ztvZipTVCorruptZipHeader
  1137.     Left = 316
  1138.     Top = 328
  1139.   end
  1140.   object ztvUnZoo: TUnZoo
  1141.     OnError = ztvUnZipError
  1142.     CpuType = cptAuto
  1143.     OnProgress = ztvUnZipProgress
  1144.     OnFileExists = ztvUnZipFileExists
  1145.     Left = 344
  1146.     Top = 328
  1147.   end
  1148.   object ztvArc2Arc: TArc2Arc
  1149.     OnError = ztvArc2ArcError
  1150.     Attributes = [fsReadOnly, fsHidden, fsSysFile, fsArchive]
  1151.     AttributesEx = []
  1152.     ConfirmOverwrites = True
  1153.     TempDir = 'C:\DOCUME~1\Chris\LOCALS~1\Temp\'
  1154.     OutArcType = tyBh
  1155.     OnFileExists = ztvArc2ArcFileExists
  1156.     OnProgress = ztvUnZipProgress
  1157.     OnGetPassword = ztvUnZipGetPassword
  1158.     Left = 8
  1159.     Top = 264
  1160.   end
  1161.   object ztvMakeSFX: TMakeSFX
  1162.     OnError = ztvMakeSFXError
  1163.     SfxStubDir = 'C:\WINDOWS\System32\'
  1164.     OnFileExists = ztvMakeSFXFileExists
  1165.     Left = 36
  1166.     Top = 264
  1167.   end
  1168.   object ztvZipCheck: TZipCheck
  1169.     CpuType = cptAuto
  1170.     OnCorruptZipHeader = ztvZipCheckCorruptZipHeader
  1171.     OnFileExists = ztvUnZipFileExists
  1172.     OnGetPassword = ztvUnZipGetPassword
  1173.     OnGetZipFirstDisk = ztvZipTVGetZipFirstDisk
  1174.     OnGetZipNextDisk = ztvZipTVGetZipNextDisk
  1175.     OnGetZipLastDisk = ztvZipTVGetZipLastDisk
  1176.     OnNestedTarFile = ztvZipCheckNestedTarFile
  1177.     OnProgress = ztvUnZipProgress
  1178.     OnStatus = ztvZipCheckStatus
  1179.     Left = 64
  1180.     Top = 264
  1181.   end
  1182.   object ztvZipTV: TZipTV
  1183.     SeedHeaderKeys.Key0 = 269766672
  1184.     SeedHeaderKeys.Key1 = 33834504
  1185.     SeedHeaderKeys.Key2 = 541352064
  1186.     RecurseDirs = False
  1187.     OnCorruptZipHeader = ztvZipTVCorruptZipHeader
  1188.     OnGetZipFirstDisk = ztvZipTVGetZipFirstDisk
  1189.     OnGetZipNextDisk = ztvZipTVGetZipNextDisk
  1190.     OnGetZipLastDisk = ztvZipTVGetZipLastDisk
  1191.     Left = 92
  1192.     Top = 264
  1193.   end
  1194.   object apodAddFiles: TApOpenDialog
  1195.     DefaultExt = '*.*'
  1196.     Filter = 'All Files (*.*)|*.*'
  1197.     Options = [ofHideReadOnly, ofAllowMultiSelect, ofEnableSizing, ofDontAddToRecent, ofForceShowHidden]
  1198.     OptionsEx = [ofExNoPlacesBar]
  1199.     Title = 'Select Files to Add'
  1200.     CustDlgParams.PosParams.ShiftX = 0
  1201.     CustDlgParams.PosParams.ShiftY = 0
  1202.     CustDlgParams.PosParams.FitToScreen = False
  1203.     DlgItemsCaptions.OK = '&Add'
  1204.     VisibleControls = [dcFolderCombo, dcFolderLabel, dcSelectionCtrl, dcOkBtn, dcCancelBtn, dcFileName, dcFileNameLabel, dcFileType, dcFileTypeLabel, dcToolBar]
  1205.     ListViewStyles.HotTrack = False
  1206.     ListViewStyles.HotTrackStyles = []
  1207.     ListViewStyles.FlatScrollBars = False
  1208.     ListViewStyles.GridLines = False
  1209.     ListViewStyles.RowSelect = False
  1210.     ListViewStyles.EnableRename = True
  1211.     ListViewStyles.EnableDelete = True
  1212.     ListViewStyles.PopupOnEmpty = True
  1213.     ListViewStyles.PopupOnSelection = True
  1214.     PlacesBar.Visible = False
  1215.     PlacesBar.Places = <>
  1216.     PlacesBar.AllowEdit = True
  1217.     PlacesBar.AllowDelete = True
  1218.     PlacesBar.AllowDrop = True
  1219.     PlacesBar.AutoScroll = True
  1220.     PlacesBar.BorderStyle = bsNone
  1221.     PlacesBar.Native = True
  1222.     ExtFilter.ShowFolders = True
  1223.     ExtFilter.Enabled = False
  1224.     ToolBar.Flat = False
  1225.     Left = 384
  1226.     Top = 328
  1227.   end
  1228.   object sdgSave: TSaveDialog
  1229.     DefaultExt = 'txt'
  1230.     Filter = 'Text File (*.txt)|*.txt'
  1231.     Title = 'Save Results To ...'
  1232.     Left = 412
  1233.     Top = 328
  1234.   end
  1235.   object pmSelect: TPopupMenu
  1236.     Left = 440
  1237.     Top = 328
  1238.     object miSelectAll: TMenuItem
  1239.       Caption = 'Select All'
  1240.       OnClick = miSelectAllClick
  1241.     end
  1242.     object miDeselectAll: TMenuItem
  1243.       Caption = 'Deselect All'
  1244.       OnClick = miDeselectAllClick
  1245.     end
  1246.     object miInvertSelection: TMenuItem
  1247.       Caption = 'Invert Selection'
  1248.       OnClick = miInvertSelectionClick
  1249.     end
  1250.   end
  1251. end
  1252.